home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 October / EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso / Aminet / comm / misc / avmNfax1_33.lha / AVMSuite / rexx / alertring.avm < prev    next >
Text File  |  1994-06-24  |  453b  |  25 lines

  1. /* */
  2.  
  3. /* cidName, cidNumber, rings, and distinctiveRing are the valid variables here! */
  4.  
  5. /*
  6. say rings
  7. say distinctiveRing
  8. say cidName
  9. say cidNumber
  10. */
  11.  
  12. if show('p', 'AVMCIDLOGGER') & rings = 1 then do
  13.   address 'AVMCIDLOGGER' 'reset'
  14.   address 'AVMCIDLOGGER' 'add' 'Call at' time()
  15. end
  16.  
  17. /*
  18. hours = time('h')
  19. if hours > 8 & hours <= 23 then
  20.   address command 'avm:dsound -2 avm:ring.iff'
  21. */
  22.   /*
  23.   address command 'avm:agmsplaysound avm:ring.iff'
  24.   */
  25.